home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C/C++ Users Group Library 1996 July
/
C-C++ Users Group Library July 1996.iso
/
listings
/
v_01_06
/
1n06024c
< prev
next >
Wrap
Text File
|
1990-09-22
|
563b
|
20 lines
% find the database Id associated with the keyword
key_search(db, btreeSelector, Keyword, Reference),
% get the object with that database Id
ref_term(db, topic_type, Reference, topic(_,Text,Buttons)),
% display text & buttons
present(Text, Buttons),
% interact with user to traverse the list of buttons
% returns ChosenAction with the action
% corresponding to the chosen button
user_pressed(Buttons, ChosenAction),
% execute the corresponding action
do(ChosenAction).